function drawepsilon(Xn,epspath)
%DRAWEPSILON Stepping-Stone-Pfad in Tableau einzeichnen

epspath = epspath(1:end-1);
vzstr = cell(numel(epspath),1);
vzstr(1:2:end) = {'+'};
vzstr(2:2:end) = {'-'};

set(0,'DefaulttextFontSize',18,'DefaulttextHitTest','off',...
    'DefaulttextHorizontalAlignment','Center',...
    'DefaulttextColor','r','DefaulttextFontWeight','normal',...
    'DefaulttextInterpreter','tex');

[m,n] = ind2sub(size(Xn),epspath);

for i = 1:numel(epspath)
    text(n(i)+0.5,size(Xn,1)+2.25-m(i),[vzstr{i},'\epsilon']);
end

end

